;; 测试包含多个表达式的lambda表达式

(display "测试多个表达式的lambda: ")
(display ((lambda (x) 
             (display "表达式1\n")
             (+ x 1)) 
           41))
(display "\n")